home *** CD-ROM | disk | FTP | other *** search
/ MACD 5 / MACD 5.bin / workbench / libs / progargslib.lha / ProgArgs / Examples / Support / progargslib.c < prev    next >
C/C++ Source or Header  |  1995-04-08  |  860b  |  34 lines
  1. void __regargs __autoopenfail(char *);
  2.  
  3. #include <proto/exec.h> 
  4. struct Library *ProgArgsBase ;
  5. static void *libbase;
  6. extern long __progargsver;
  7. extern long __progargsreq;
  8.  
  9. void __stdargs _STI_openprogargs(void)
  10. {
  11.    ProgArgsBase = libbase = 
  12.        (void *)OpenLibrary("progargs.library", __progargsver);
  13.        
  14.    if(ProgArgsBase == NULL)
  15.        ProgArgsBase = libbase = 
  16.            (void *)OpenLibrary("PROGDIR:progargs.library", __progargsver);
  17.            
  18.    if(ProgArgsBase == NULL)
  19.        ProgArgsBase = libbase = 
  20.            (void *)OpenLibrary("PROGDIR:libs/progargs.library", __progargsver);
  21.            
  22.    if (ProgArgsBase == NULL && __progargsreq)
  23.       __autoopenfail("progargs.library");
  24. }
  25.  
  26. void __stdargs _STD_closeprogargs(void)
  27. {
  28.    if (libbase)
  29.    {
  30.       CloseLibrary((struct Library *)libbase);
  31.       libbase = ProgArgsBase = NULL;
  32.    }
  33. }
  34.